module Tele
  module Idele
    # USAGE: Hash.from_xml(YOUR_XML_STRING)
    # modified from http://stackoverflow.com/questions/1230741/convert-a-nokogiri-document-to-a-ruby-hash/1231297#123129
    class Hash < ::Hash
      class << self
        def from_xml(xml_io)
          result = Nokogiri::XML(xml_io)
          return { result.root.name.to_sym => xml_node_to_hash(result.root) }
        rescue Exception => e
          # raise your custom exception here
        end

        def xml_node_to_hash(node)
          # If we are at the root of the document, start the hash
          if node.element?
            result_hash = {}
            if node.attributes != {}
              attributes = {}
              node.attributes.keys.each do |key|
                attributes[node.attributes[key].name.to_sym] = node.attributes[key].value
              end
            end
            if !node.children.empty?
              node.children.each do |child|
                result = xml_node_to_hash(child)

                if child.name == 'text'
                  unless child.next_sibling || child.previous_sibling
                    return result unless attributes
                    result_hash[child.name.to_sym] = result
                  end
                elsif result_hash[child.name.to_sym]

                  if result_hash[child.name.to_sym].is_a?(Object::Array)
                    result_hash[child.name.to_sym] << result
                  else
                    result_hash[child.name.to_sym] = [result_hash[child.name.to_sym]] << result
                  end
                else
                  result_hash[child.name.to_sym] = result
                end
              end
              if attributes
                # add code to remove non-data attributes e.g. xml schema, namespace here
                # if there is a collision then node content supersets attributes
                result_hash = attributes.merge(result_hash)
              end
              return result_hash
            else
              return attributes
            end
          else
            node.content.to_s
          end
        end
      end
    end
  end
end
